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MATHEMATICS 

INTRODUCTION 



Conventional methods of hand-calculating — using desk cal¬ 
culators and tables — are often impractical for cases in which 
the work is marginal for a full-scale computer. 

Even when a full-scale computer is readily accessible, the 
hand-calculating involved in checking out the program can 
require a great deal of time and work. 


PROGRAMMA 101 can perform this work in seconds, bringing the full power of a 
modern computer to the top of every desk. Program routines exist for all of 
the elementary mathematical functions as well as for any function that can be 
represented by a power series and most of these are compact enough to be 
used in more elaborate programs. Thus, formulas involving combinations of 
elementary functions such as 


a f b sin (/? + 4- sin mac) 1 

4 - + tan_1 --— 1 — T — 

3 a — c sin (/?- f- a) J 

can be easily programmed directly at the keyboard and the answers for specific 
numeric entries will be given in seconds. 


Also in the library are routines for solutions of equations, determinants, numeri¬ 
cal integration, differential equations, matrix manipulation, and the solution of 
specific problems in areas such as analytic geometry. 

PROGRAMMA 101 will accept a program and constants recorded on a magnetic 
card as well as directly from the keyboard. It also has an unusual capability 
that permits it to be operated manually at program stops. The manual instruc¬ 
tions are the same as the programmable ones, making possible a flexible and 
dynamic utilization of the computer. 


Programma is an invaluable aid to mathematicians and workers in physical 
sciences because it saves steps to a large computer for marginal problems and 
reduces the normal labor of hand-calculating to almost nothing. Because of 
its elegance and logic, the computer language can be mastered in an hour; the 
program is always under operator control. Programma requires no complicated 
control system or compiling, as in time-sharing or Fortran, and a large program 
library is always on hand to verify or modify the program being used, or to 
implement second thoughts. All of this enables the operator to use the com¬ 
puter as an immediate extension of his own ideas in his work. 

A closer feedback is possible than with any other system. With the Programma, 
the input-output problem, the time involved in compiling, and similar obstacles 
tending to separate the man from the computer, are eliminated. 


Enclosed in this folder are examples from Programme's mathematical program 
library. The programs may be used by themselves, in combination with 
manual operations (e.g., a plot of ax 2 sin 3 /2 n x could be obtained using only the 
sine function program), or as routines to be incorporated in more complicated 
formulas. Many versions of each elementary function are available to suit 
individual programming requirements, for example, the storage space versus 
computing time problem ■ 




ELEMENTARY 

FUNCTIONS 


The Programma mathematical program library uses standard approximations 
to compute elementary functions to varying degrees of accuracy. Most of 
these approximations are based on Tchebycheff series with fast convergence. 
Depending on the nature of the function and the accuracy desired, the 
series employed may have as many as eight coefficients or as few as three, 
and, to provide flexibility in using the routine, the constants are in some cases 
generated in the machine while in others they are placed in registers. The 
treatment of argument ranges follows similar variation. 

The program library contains, in addition to the basic function, some routines 
of common usage. 


1 — e- b * 

Hence for exponentials there is a routine for —=-— 


and for Bessel functions there is a routine for - 

x 

The programmer may employ the program library as the problem requires and 
may even generate a power series for other functions in conjunction with the 
library routine. For this purpose, a number of the routines have been created 
that are extremely economical in storage requirements. Others are designed 
for wider variability of the argument or for precision of up to 10 decimal 
places with a maximum error < 10 9 ■ 
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1 — e-x 

SPECIFICATION: 

The argument must be 4z 14 since e- 14 < 10- G and the program is limited to six 
decimal places for fast calculating 


FORMULAS USED: 

1 — e-* = 1- - 

e * 


e^zz:(ew)32 |W z=^r/32 


e w = 


P(w) 
P(—w) 


P(w) = 168 + 84w + 18w 2 + 2w 3 + O.lw 4 


EXAMPLE: 

Given x — 0.0834 
1 —e-* = 0.080017 


PROGRAMMA PRINTS 


0.0834 V 

0.080017 AO 


0 =RESULT 
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HYPERBOLIC COSINE 


SPECIFICATION: 

For 7 or 6 decimal places 0 < x ^ 4 
For 5 decimal places 0 < x 4 10 


FORMULA USED: 


cosh x— 1 + 


E 


i = 1 


x 2i 

"( 21)1 



, where 


n° depends upon the number of 
decimal places desired 


EXAMPLE: 


Given x = 0.5663 

then for 7 decimal places n° = 18 
and cosh x = 1.1646790 


PROGRAMMA PRINTS 

18 D* 

0.5663 V 

1.1646790 DO 


0 =RESULT 
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COMMON LOGARITHM 


SPECIFICATION: 

The argument X must be expressed in normalized form: X = .r • 10 m , 1 4 x < 10 
Notice that x is ten times the mantissa used in tables and that m is correspondingly 
one less than the characteristic for table use. 


FORMULAS USED: 


X = X- 10 “ 

Log X = m + Log x 

Log x — CjW + C 3 W 3 * + C 5 W r > + C 7 W 7 



EXAMPLE: 


Given X= 483.615 

= 4.83615- 10 * 2 
Then m = 2 

x — 4.83615 
and Log X = 2.6844997 


PROGRAMMA PRINTS 


V 

2 S 

4.83615 S 

2.6844997 cO 


0 = RESULT 









COMPLEX SQUARE ROOT 



Olivetti 

underwood 

Proqramma 

101 


SPECIFICATION: 

The argument must be introduced by its real part followed by its imaginary part. 


FORMULA USED: 


V a + ib= d= [Sj. + is 2 ] 



EXAMPLE: 


Given 

a = — 4.4 


ib = i 7.0 

then 

Si = 1.390685 


s 2 = 2.516744 


PROGRAMMA PRINTS 


V 

— 4.4 S 
7.0 S 

1.390685 DO 
2.516744 dO 

— 1.390685 DO 

— 2.516744 dO 


0 =RESULT 
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EXPONENTIAL 10* 

SPECIFICATION: 

The argument may be indefinitely large since the result is in normalized form. 
That is 10 x = 10* x • 10 m , where 0 ^ ;tr < 10 

FORMULAS USED: 

10 x = 10 x • 10 m , 0 ^ < 10 

10* = y/10 (1 + CiZ + C 2 Z 2 . . . + C 7 Z 7 ) 4 

Z = 2 ;r — 1 


EXAMPLE: 

Given X = 5.41 PROGRAMMA PRINTS 

Then 10 x = 10* • 10 m 5 41 \j 

where 10* = 2.57050381 5.00000000 AO 

m = 5 - 0 2.57050381 AO 


0 = RESULT 
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SINE, COSINE, AND TANGENT 

SPECIFICATION: 

The argument may be expressed in either degrees or radians. For sine and co¬ 
sine x 4z 90°. For tangents: 0° 4= x 4= 89°. 

FORMULAS USED: 
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cos-~is computed by a series approximation based on Tchebycheff polynomials: 
5 

COS y ~ ^2 Ci T*(y 2 ) , T*(y) = cos no 


cos e = 2y — 1 for — 1 4= y 4= 1 and y = 


7T 


EXAMPLE: 


Given angle jr = 22.°53200 


PROGRAMMA PRINTS 


sin * = 0.3831993644 
cos x = 0.9236656578 
tan * = 0.4148680436 


22.532 V 
0.3831993644 bO 


22.532 W 
0.9236656578 bO 


22.532 Z 

0.4148680436 AO 


0 =RESULT 








* 


Olivetti 

undenniood 

Proqramma 

101 


GAMMA FUNCTION 

SPECIFICATION: 

The arguments must be in the range o ^ < 1 

FORMULAS USED: 

r(l + x) — 1 + O^x + + OqX g 


EXAMPLE: 

Given x = 0.803 
r (1 + x) = 0.932191 


PROGRAMMA PRINTS 


0.803 V 

0.932191 AO 


0 =RESULT 



















